#ifndef _MENU_CH
#define _MENU_CH

#xcommand MENU [ <oMenu> ] => [ <oMenu> := ] MenuBegin()

#xcommand MENUITEM [ <oMenuItem> PROMPT ] <cPrompt> ;
             [ MESSAGE <cMsg> ] ;
             [ ACTION <uAction> ] ;
       => ;
          [ <oMenuItem> := ] MenuAddItem( <cPrompt>, <cMsg>, <{uAction}> )

#xcommand SEPARATOR => MenuAddItem()

#xcommand ENDMENU => MenuEnd()

#endif
